V 



0 PRINTER RUSH # 

(PTO ASSISTANCE) 



^5 5 



Application : Q Q^ ^^)^l29fX Examiner 

Location: (fDC^TVlF FDC 



GAU 



£*\P- 



From: 



Location: 

(fDC^FMF FD c Date: 

Tracking #: ^^^2^ ZWeek Date: 



DOC CODE 

□ 1449 

□ ids 

□ CLM 

n iifw 

□ skfw 

Q/fDRW 

□ oath 

□ 312 

□ spec 



DOC DATE 



MISCELLANEOUS 

I I Continuing Data 
I I Foreign Priority 
I I Document Legibility 
I I Fees 
□ Other 



rRUSHl MESSAGE: i)44-^ * QU J? ~\ 



3g 



4^ 



■Hlvo <^ 




[XRUSH] RESPONSE: 





sat 



INITIALS: 

NOTE: This form will be included as part of the official USPTO record, with the Response f 



document coded as XRUSH. 
REV 10/04 



struct S { 

SOthrowOx 
-SO throw(); 

}; 

^103 

struct T { 
T();^104 

~ T ();^.io5 

}; 



101 

V.102 



FIG. 1 J 



108 



void wopfQ; 

^"106 

LI: { 

T ant; 107 
^try { r i09 
if(x>0) { 
S boa; ^-uo 
else { 
Scat;^H2 
Tdogj^in 
woof0;^-ii4 

115-^ 

} catch( inty ) {^\n 



120 



}^-121 

L2:: 



Selk;^H8 
woofQ;^ii9 



f #include <setjmp.h> 
^200 

struct EHJtem { f 201 
struct EHJtem * next; 
enum {DESTROY,TRY} tag; ^202 
union { 

struct { 2Q3 
void * object;-/" 
void (*dtor)();^ 2()4 
} destructor; 

struct { 2Q5 
jmp_buf buffer;-^" 
struct handler_spec* handlers^ 
} try_block; 

}; 

}; 

struct EH_item * EH_stack jtr^ 207 



FIG. 2 



FIG. 3 

PRIOR ART 



f 



V 



struct EHJtem ra, rb, rc, rd, re, rt; 
LI: 

303^T(&ant); 
304^-ra.kind = DESTROY; 

ra.destructor.object = &ant; ra. destructor. dtor = &~T; 
306^^ra.next - EH_stack_ptr; EH_stack_ptr = &ra; 
307^rt.kind = TRY; 

rt.next = EH_stack_ptr; 
rt.try_block.handlers = ...; 
3 1 ^-rt.next = EH_stack_ptr; EH_stackj>tr = &rt; 
3 1 setjmp( rt.tryj)lock.buffer)=0 ) { 
if( x>0 ) { 
313^S(&boa); 
314^-rb.kind = DESTROY; 

rb.destructor.object = &boa; rb. destructor. dtor = &~S; 
rb.next = EH_stack_ptr; EH stackjtr = &rb; 
3 1 EH_stack_ptr = EH_stack_ptr->next; 
~S(& boa); 
} else { 
S(cat); 

rc.ldnd = DESTROY; 

rc/destructor.object = &cat; rc.destructor.dtor = &~S; 
rc,tiext = EH_stack_ptr; EH_stack_ptr = &rc; 
T(&dog); . 
rd.kind = DESTROY; 

rd. destructor, object = &dog; rd.destructor.dtor = & ~T; 
rd.next = EH_stack_ptr; EH_stack_ptr = &rd; 
woofQ; 

EH_stack_ptr - EH_stack_ptr->next; 
~T(&dog); 

EH_stack_ptr = EH_stack_ptr->next; 
~S(& cat); 

} 

} else { 
S(&elk); 

re.kind = DESTROY; 

redestructor.object = &elk; re.destructor.dtor = address of - 
re. next = EH_stack_ptr; EH_stack_ptr = &re; 
~S(&eIk); 

EH_stack_ptr = EH_stack_ptr->next; 

342 ^EH_stack_ptr = EH_stack_ptr->next; 
343 ~V-EH_stack_ptr = EH_stack_ptr->next; 
- ~T(ant); 
L2: 



400. 



402^ 



403^ 



404- 



± 

Determine state of target data structure at 
selected program points 



40 L/- 



V 



Partition state of target data 
structure into components 



Determine operations to be inserted at each 
selected program point in order to set each 
component of the state at that program point. 



V 



Compute placement of setting operations 
that eliminates partial redundancies 



Place the setting operations in the program 
according to the computed placement. 



V 



C end ) 

FIG. 4 



501 t i 

502t ^ (succeed) ^ T(&ant) _ 



S(&boa) 




524 



L2 (succeed) \ / 
527 52« 



FIG. 5 




600. 



V 

Does routine have 
cleanup instructions? 



601 



yes 



no 



Build cleanup tree and 
cleanup states for routine. 



602 



Compute down-safety transfer function 
DOWNSAFE(e) for each edge. 



604 



A. 



Compute up-safety transfer 
function UPSAFE(e). 



Solve flow-equations 
for DOWNS AFE*. 



Solve flow equations 
for UPS APE*. 



605 



Use DOWNSAFE* and UPSAFE* to 
place instructions that set components 
of the exception-handling stack. 



606 



607-^1 



Remove exceptional edges ^ 



FIG. 6 



60B- 



Insert prologue 



-603 




x>0? 



701 t i 

(succeed)^ T(&ant) L1 



700 



f succeed) ^ 



zzzzzzza 



S(&cat) , 
70kX 

T(&dog) | 

709^V 

(succeed) 
woof() 

711^ 

(succeed) 

712-vQ- 

~T(&dogJ\ 

7,3^ \ 

(succeed) 



~S(&cat) 



try 



~T(&ant) 



FIG. 7 



~T(&dog) 



~S(&cat) 



try 



T(&ant) 



-S(&cat) 



try 




~T(&ant) 
XfcZZZZZZZ 



~S(&cat) 



~S(&elk) 






~S(&elk) 




~T(&ant) 



804^ CONTINUE 




c 



start CLEANUP 



900. 
901 



TREE(k)) 



Has STATE[w] been set yet? 




Allocate a new cleanup node n 
Set PARENT^] := nil 
ROOT:=n 
Set OPERATION^] :« CONTINUE 
Set PTR_INDEX[n]:=NEW_INDEXO 



V 



STATE[«]:=nil 
Set E to set of edges with u for a tail. 
Is E empty? 



71V 



yes 



yes 



904- 



no 



.902 



Is u the terminal or throw 
vertex of the routine? 



no 



Set e to any edge in E 
Is e an exceptional edge? 



no 



r 



905 



Can edge e throw exception? 



yes 



907 

s 



Does e have form "match 7?" for some 7? 



no 



r 



909 



Recursively invoke 
CLEANUP_TREE(HEAD(e)) 



Does edge e 



no 



yes 

M/ 



r 



906 



Add TAIL(e) to set NEED 



yes 



908 



Invoke CATCH_CHAIN(w) 



912 



-910 



have form 



"~D(&X) for some £> and X? 



yes 



Set «. = ALLOCATE(STATE[HEAD(e)]) 
Set OPERATION^] := -25(A) 
Set STATE[k]:=/j. 
OBJECT_INDEX[«]:=NEW_INDEX0; 



no 



911 



Set STATE[a):=STATE[HEAD(e)] 



no 



Remove e from E. 
Is £ the empty set? 



913 



FIG. 9 



± 

Set list HANDLERS to empty. 
Set w~u 



1000 



1001 



1006 



Is there an edge e of the form "match T y 
for some 7* and such that TAIL(e)=w? 



yes 



no 



^ Invoke CLEANUP_TREE(w/) 



1002 



Set edge g to edge with form "(true)" 
such that TAILte)=HEAD(e). 



V 



Set «:= ALLOCATE (STATEfw]) 
STATE[w]:=« 
Set OPERATION[«]:=TRY 
Set CHAINfrt] :=HANDLERS 
Set SETJMP_ rNDEX[«]:=NEW_INDEX() 



V 



Append CATCH(r,HEADfe)) to list HANDLERS 



"C 



1007 



1003 



Set edge/ to edge with form "(false)'* 
such that TAIL(/)=HEAD(e). 



U004 



Q end ^ 



FIG. 10 



Set w~ HEAD(/) -^1005 



Q start ^ 



1100 
2. 



Set SAVER := nil 



FIG. 11 



1101 

<L_ 

^| Set ROOT := nil 



7PT 



Is there a terminal vertex v ? 



1104 



Invoke CLEANUP_TREE(v) 
STATE[v] := ROOT 



A 105 



1102 
2 



> N_INDEX:=0 



1103 

2_ 



For each vertex w that is 
the tail of a normal edge, 
invoke CLEANUP_TREE(u) 



( start ALLOCATE(w) ) 



1300 



Allocate a new cleanup tree node n 



1301 
2 



Set PARENT[m]:=/h 
Set KJND_INDEX[n] :=NE W_INDEXQ 



1302 v 



Is SAVER=nil? 



no 



1305 




1303 
2 



Is m=nil? 



SAVER=n 


^ yes 





no 



( start NEW_INDEXQ ) 



Set *:-N INDEX ^ 



,1200 



1201 



SetN INDEX:=N INDEX+1 



1202 



V 



^ Return 

FIG. 12 



1304 



Is OPERATION[m]=CONTINUE? 



no 



Return n 



"^-1304 



FIG. 13 



1401 



f succeed) ^ T(&ant) 



LI 



x>0? 



1400 



S(&boa) 



^S(&boa) 




S(&cat) 

1408-\X 
T(&dOg)| 

1409^vV 

(succeed) 
X 

1410-vQ 

woofQ 

141 

(succeed) \ , 

1412'vQ v 
^T(&dog)^ ' 

1413-\V' 

(succeed) 



(succeed) / K i42\ 



~T(&ant) 


1406 


(succeed) \^ 





1426 



FIG. 14 



1500. 





Set all elements of T(k) to IDENTITY. 



150L 



FIG. 15 



Is u in set NEED? 



yes 



no 



A1Z_ 



1502^ Set edge e to edge such that TAIL(e)=« ^ Set «:=STATE[HEAD(e)] 



1503 

S 



1505^ T(w)[PTR_INDEX[«]]:=TOP <• 



CONTINUE 



For each node m in the cleanup tree, 
set T(w) [PTR_INDEX[m]] -BOTTOM 



1506 



1504 



What is OPERATION^]? 



TRY 



T(w) [SETJMP_INDEX[«]]:=TOP 

I 

1508 



1509- 



T(k)[OBJECT_INDEX[«]]:=TOP 

" r 

V 



1507 



T(«)tKIND_INDEX[«]]~TOP 



yes 



Set n:=PARENT[«] 
Is «=nil? 



no 



1510 v es 



^ start ^ 



1600- 



± 

Set all elements of DOWNS AFE(e) to IDENTITY. 



1601- 



1602- 



YCS 

Does edge e have form "(fail)**? ^> 



Set DOWNSAFE := T(HEAD(e)) 



1603- 



A/ 



Invoke EFFECT(e,DOWNSAFE(e)) 



1605^ 



1604^- Is e an exceptional edge? — — ^ 



yes 



Does there exist a normal edge f 
such that HEAD(e)= TAIL (/) 



1606^- 



no 



yes 



v 



Set all elements of 
DOWNSAFE(e) to BOTTOM. 



c 



end 



FIG. 16 



M/ 

\70ls\ Set UPSAFE(e) := T(TAIL(e)) 



1702- 



Does edge e have form "(fail)"? 



yes 



1703^ 



no 



1708 



Invoke EFFECT(e,UPSAFE(e)) 



Set k := 0 



1704 




> Is KNJNDEX? 



yes 



1707-/-} SeU:=*+l 
7fT 



false 



no 



DOWNSAFE*(TAIL(e))[*]? 



true 



1705 



Set UPSAFE(e)[/c]:=^TOP 



•1706 



FIG. 17 



± ; 

Set JV to set of nodes in cleanup tree 
that represent destructions of objects. 



1800 



1803 



Remove n from N 



7K 



1801 



Is set TV empty? 



yes 



no 



Set n to any node in N. 



no 



1 802 



Is address of object corresponding to node 
n modified by an instruction on edge e? 



^1804 



yes 



Set/[OBJECT_INDEX[«]]:= BOTTOM; 



1805 



FIG. 18 



± 

Set E to set of edges in control-flow graph. 



FIG. 19 




O900 



^ Is set E empty? 



•1901 



no 



Set e to any element of E. 



-1902 



Set k~0 



1906 



Set k\=k+\ 

~7K 



2> Is*<N_INDEX? 



true 



1904 



1905 



no 



UPSAFE*(TAIL(e))(fc)? 



true 



•1907 



false 



DOWNSAFE*(TAIL(e))(£)? 



•1908 



false 



UPSAFE*(HEAD(e))(A:)? 



•1909 



false 



1910 
-A- 



false 



DOWNSAFE*(HEAD(e))(A)? 



true 



true 



v 



Invoke BIT_DIFFERENCE (k) 



.1911 



c 



2000 



FIG. 20 



To which partial map 
does k belong? 



OBJECT_INDEX[«] 




20( 
S 



OPERATION^] is -£>(&*) for some X. 
Insert "&REC(n).destructor.object = &X" 



SETJMP_INDEX[«] 



2002 



\/ 



Insert " setjmp( &REC (n).try_block.buffer)" 



PTR_INDEX[w] 



Is OPERATION («)=CONTINUE ? 



yes 



rnsert ' *EH_stackj>tr;==SAVER.next' ' 



^2003 



no 



2005 



Insert "EH^stackjtr :=&REC («)" 



KIND_INDEX[«] 




2006 



OPERATION^] is TRY? 



yes 



Insert "ITEMM-tag := TRY" 



no 



2009 



Insert *TTEM(n).tag := DESTROY" 



-2007 



2008 



Insert "&REC («).try_block.catch_info = CATCH(k)" 



2010 

u 



OPERATION^] is ~D(&X) for some X. 
Insert "&REC («).destructor.dtor =&-£>" 



2011 



^ Is PARENT[«] *nil ? 




no 



Is OPERATION[PARENT[«]]=CONTINUE ? 

"7 



2012 



2013 



Insert 

"REC(n).next = &REC(PARENT[/»])" 



yes yes 

\1/ L 



2014 ^ Is «=SAVER ? 



end 



Insert "REC (n).next = REC(SAVER).next" 



-2015 



3 



(~) FIG. 21 



2100 



V 



For each node n in cleanup tree such 
that OPERATIONC/i^CONTINUE, 
add declaration for REC(/?) to routine. 



210Lx IsSAVER=nil? 



no 



yes 



end 




2 1 02/ Insert - •REC(SAVER).nextHEH_stack_ptr' * 



v T 1 L 

jsucceed) > T(&ant) 



S(&boa) 



rc.destructor. object = 


&cat; 




rd.destructor.object = 
EH_stack_ptr = &rd; 


&dog; 


2260 

; 


^258 



~S(&boa) 



2207 

S(&cat) 

2208^Q 

T(&dogY 

2209^V 

(succeed) 

X 

2210- ^Q 

woof() f M EH,stack_ptr = &rc; 

2211- \V 

(succeed) 

2212*\Q 

~T(&dog) 

2213-0* 
(succeed) 



-S(cat) (succeed) 
~S(&elk) 

"*2222 



2219 



2263 

_Z_ 



S(&elk) 



EH_stack_ptr = ra.next; 




FIG. 22 




2253 



ra.kind =DESTROY; 
ra.destructor.dtor = & -T 
ra.destructor.object - &ant; 
rt.kind =TRY; 
rt.next=&ra; 
rt.handlers = CHAIN(u) 
rc.kind = DESTROY 
rc.next = rt.next; 
rc.destructor.dtor = & -S; 
rd.kind:=DESTROY; 
rd.next=&rc; 

rd.destructor.dtor = & ~T; 
EH_stack_ptr = &rc; 
setjmp(&rt.try_block.buffer ) 



T 9 (succeed) \ y 



~T(&ant 




re.kind = DESTROY 
re.next = &ra; 
rc.destructor.dtor = & ~S; 
re.object = &elk; 
EH_stack_ptr = &re; 

? 

2269 



2271 



EH_stack_ptr = ra.next; 



f struct EH_item ra, rb, re, rd, re, rt;-^ 2301 
/ LI: 

ra.next = EH_stack_ptr;^ 2303 
T(&ant); 
if( x>0 ) { 
S(&boa); 
~S(&boa); 
} else { 

ra.kind = DESTROY; 

ra.destructor.dtor = &~T; 

ra.destructor.object = &ant; 

rt.kind - TRY; 

rt.next = &ra; 

rt.try_block.handlers = . , .; 

rt.next = &ra; 

rc.kind = DESTROY; 

rc.destructor.dtor = &~S; 

rc.next = &rt; 

rd.kind = DESTROY; 

rd.destructor.dtor = &-T; 

rd.next = &rc; 

eh_stack_ptr = &rc; 

if( setjmp( &rt.try_block.buffer)=0 ) { 
S(&cat); 

rc.destructor.object = &cat; 
T(&dog) 

rd.destructor.object - &dog; 
eh_stack_ptr = &rd; 
woof(); 

EH_stack_ptr = &rc; 
~T(&dog); 

EH_stack_ptr = ra.next; 
~S(&cat); 
} else { 

re.kind = DESTROY; 
re.next = &ra; 
re.destructor.dtor = &~S; 
eh_stack_ptr - &re; 
S(&elk); 

re.destructor.object = &elk; 
woofO; 

EH_stack_ptr = ra.next 
~S(&elk); 

} 

V-T&ant) 
L2: 



FIG. 23 



f struct R { 

RO; ^2402 

~R0 throw();^2403 

}; 



FIG. 24 < 



{ 



i=0; 

do {^-2408 

R fox; ^-2409 

woof();^- 2410 

i=i+l; 
} while(i<100 )p- 2412 



2551 




FIG. 26 



true 



likely 



^ 

Set all elements of SDOWNSAFE(e) to IDENTITY. 



Jt 

false 



270 k 



M/ 

Is edge e rarely taken? 



yes 



no 



V 



2702^ 



Set SDOWNSAFE := to represent 
strict down-safety for e. 



2703^ 



Is tail of e the tail of some 
other edge that is rarely taken? 



no 



yes 



Set P to function that maps x to false if 
2704^~ *=false, and "likely" otherwise. 



2705-^- 



For each element/of $DOWNSAFE(e), 

set/=Po/ ->( end ) 



V 



FIG. 27 



± 

Set SUPSAFE := to function of e 
280 ^ at represents strict up-safety 



FIG. 28 



2802^ 



2803^ 



Is edge e rarely taken? 



yes 



no 



Set k~0 



2804 
A, 



Is&<N rNDEX? 




280V Set < 



7\ 



false 



no 



end 



yes 



SDOWNSAFE*(TAIL(e))[)t]? 



true 



likely 



2805 



Set $UPSAFE(e)[*]:=$UPSAFE(e)oTOP 



-2806 



FIG. 29 



c 



true 



^ start ^ 

V 

$UPSAPE*(TAJL(e))(A:)? 



true 



likely 



*2900 



false 



$DOWNSAFE*(TAIL(e))(*)? 



-2901 



false 



V 



$UPSAFE*(HEAD(e))(ifc)? 



false 



2903 



false 



$DOWNSAFE*(HEAD(e))(£)? 



2904 
k 



likely 



Insert guard 



end 



> 



V 



true 



V 



true 



Insert on edge e the operation corresponding to k 



ABOVE 



CONTINUE 



FIG. 30 




BELOW 



